/*
 * 	   Created by Daniel Nadeau
 * 	   daniel.nadeau01@gmail.com
 * 	   danielnadeau.blogspot.com
 *
 * 	   Licensed to the Apache Software Foundation (ASF) under one
       or more contributor license agreements.  See the NOTICE file
       distributed with this work for additional information
       regarding copyright ownership.  The ASF licenses this file
       to you under the Apache License, Version 2.0 (the
       "License"); you may not use this file except in compliance
       with the License.  You may obtain a copy of the License at

         http://www.apache.org/licenses/LICENSE-2.0

       Unless required by applicable law or agreed to in writing,
       software distributed under the License is distributed on an
       "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY
       KIND, either express or implied.  See the License for the
       specific language governing permissions and limitations
       under the License.
 */

package com.echo.holographlibrary;

import java.text.NumberFormat;
import java.util.ArrayList;

import org.joda.time.DateTime;

import android.content.Context;
import android.graphics.Bitmap;
import android.graphics.Bitmap.Config;
import android.graphics.Canvas;
import android.graphics.Color;
import android.graphics.Paint;
import android.graphics.Path;
import android.graphics.Path.Direction;
import android.graphics.PorterDuffXfermode;
import android.graphics.Region;
import android.util.AttributeSet;
import android.view.View;
import android.widget.HorizontalScrollView;

public class LineGraph extends View {

	private ArrayList<Line> lines = new ArrayList<Line>();
	Paint paint = new Paint();
	private float minY = 0, minX = 0;
	private float maxY = 0, maxX = 0;
	private boolean isMaxYUserSet = false;
	private int lineToFill = -1;
	private int indexSelected = -1;
	private OnPointClickedListener listener;
	private Bitmap fullImage;
	private boolean shouldUpdate = false;
	private DateTime hoje=new DateTime();
	private HorizontalScrollView scroll;


	public LineGraph(Context context){
		super(context);
	}

	public LineGraph(Context context, AttributeSet attrs) {
		super(context, attrs);
	}
	public void setMinY(float minY){

	}

	public void removeAllLines(){
		while (lines.size() > 0){
			lines.remove(0);
		}
		shouldUpdate = true;
		postInvalidate();
	}

	public void addLine(Line line) {
		lines.add(line);
		shouldUpdate = true;
		postInvalidate();
	}
	public ArrayList<Line> getLines() {
		return lines;
	}
	public void setLineToFill(int indexOfLine) {
		this.lineToFill = indexOfLine;
		shouldUpdate = true;
		postInvalidate();
	}
	public int getLineToFill(){
		return lineToFill;
	}
	public void setLines(ArrayList<Line> lines) {
		this.lines = lines;
	}
	public Line getLine(int index) {
		return lines.get(index);
	}
	public int getSize(){
		return lines.size();
	}

	public void setRangeY(float min, float max) {
		minY = min;
		maxY = max;
		isMaxYUserSet = true;
	}
	public void setMaxYUserSet(boolean isMaxYUserSet) {
		this.isMaxYUserSet = isMaxYUserSet;
	}
	public float getMaxY(){
		if (isMaxYUserSet){
			return maxY;
		} else {
			if(lines.size()>0){
				if(lines.get(0).getPoints().size()>0){
					maxY = lines.get(0).getPoint(0).getY();
					for (Line line : lines){
						for (LinePoint point : line.getPoints()){
							if (point.getY() > maxY){
								maxY = point.getY();
							}
						}
					}
				}
			}
			return maxY;
		}

	}
	public float getMinY(){
		if (isMaxYUserSet){
			return minY;
		} else {
			if(lines.size()>0){
				if(lines.get(0).getPoints().size()>0){
					float min = lines.get(0).getPoint(0).getY();
					for (Line line : lines){
						for (LinePoint point : line.getPoints()){
							if (point.getY() < min) min = point.getY();
						}
					}
					minY = min;
				}
			}
			return minY;
		}
	}
	public float getMaxX(){
		if(lines.size()>0){
			if(lines.get(0).getPoints().size()>0){
				float max = lines.get(0).getPoint(0).getX();
				for (Line line : lines){
					for (LinePoint point : line.getPoints()){
						if (point.getX() > max) max = point.getX();
					}
				}
				maxX = max;
			}
		}
		return maxX;

	}

	public float getMinX() {
		if (lines.size() > 0) {
			if (lines.get(0).getPoints().size() > 0) {
				float max = lines.get(0).getPoint(0).getX();
				for (Line line : lines) {
					for (LinePoint point : line.getPoints()) {
						if (point.getX() < max)
							max = point.getX();
					}
				}
				maxX = max;
			}
		}
		return maxX;
	}


	public void onDraw(Canvas ca) {
		if (fullImage == null || shouldUpdate) {
			if(fullImage!=null)
				fullImage.recycle();

			fullImage = Bitmap.createBitmap(getWidth(), getHeight(), Config.ARGB_8888);
			Canvas canvas = new Canvas(fullImage);

			paint.reset();
			Path path = new Path();

			float bottomPadding = 70, topPadding = 10;
			float sidePadding = 20;
			float usableHeight = getHeight() - bottomPadding - topPadding;
			float usableWidth = getWidth() - 2*sidePadding;

			//gera as linhas de preenchimento
			int lineCount = 0;
			for (Line line : lines){
				int count = 0;
				float firstXPixels = 0, lastXPixels = 0, newYPixels = 0;
				float lastYPixels = 0, newXPixels = 0;
				float maxY = getMaxY();
				float minY = getMinY();
				float maxX = getMaxX();
				float minX = getMinX();

				if (lineCount == lineToFill){
					paint.setColor(Color.BLACK);
					paint.setAlpha(30);
					paint.setStrokeWidth(2);
					for (int i = 10; i-getWidth() < getHeight(); i = i+20){
						canvas.drawLine(i, getHeight()-bottomPadding, 0, getHeight()-bottomPadding-i, paint);
					}

					paint.reset();

					paint.setXfermode(new PorterDuffXfermode(android.graphics.PorterDuff.Mode.CLEAR));
					for (LinePoint p : line.getPoints()){
						float yPercent = (p.getY()-minY)/(maxY - minY);
						float xPercent = (p.getX()-minX)/(maxX - minX);
						if (count == 0){
							lastXPixels = sidePadding + (xPercent*usableWidth);
							lastYPixels = getHeight() - bottomPadding - (usableHeight*yPercent);
							firstXPixels = lastXPixels;
							path.moveTo(lastXPixels, lastYPixels);
						} else {
							newXPixels = sidePadding + (xPercent*usableWidth);
							newYPixels = getHeight() - bottomPadding - (usableHeight*yPercent);
							path.lineTo(newXPixels, newYPixels);
							Path pa = new Path();
							pa.moveTo(lastXPixels, lastYPixels);
							pa.lineTo(newXPixels, newYPixels);
							pa.lineTo(newXPixels, 0);
							pa.lineTo(lastXPixels, 0);
							pa.close();
							canvas.drawPath(pa, paint);
							lastXPixels = newXPixels;
							lastYPixels = newYPixels;
						}
						count++;
					}

					path.reset();

					path.moveTo(0, getHeight()-bottomPadding);
					path.lineTo(sidePadding, getHeight()-bottomPadding);
					path.lineTo(sidePadding, 0);
					path.lineTo(0, 0);
					path.close();
					canvas.drawPath(path, paint);

					path.reset();

					path.moveTo(getWidth(), getHeight()-bottomPadding);
					path.lineTo(getWidth()-sidePadding, getHeight()-bottomPadding);
					path.lineTo(getWidth()-sidePadding, 0);
					path.lineTo(getWidth(), 0);
					path.close();

					canvas.drawPath(path, paint);

				}

				lineCount++;
			}

			paint.reset();

			paint.setColor(Color.BLACK);
			paint.setAlpha(50);
			paint.setAntiAlias(true);
			canvas.drawLine(sidePadding, getHeight() - bottomPadding, getWidth()-sidePadding, getHeight()-bottomPadding, paint);
			paint.setAlpha(255);

			//gera as linhas
			for (Line line : lines){
				int count = 0;
				float lastXPixels = 0, newYPixels = 0;
				float lastYPixels = 0, newXPixels = 0;
				float maxY = getMaxY();
				float minY = getMinY();
				float maxX = getMaxX();
				float minX = getMinX();

				paint.setColor(line.getColor());
				paint.setStrokeWidth(6);

				for (LinePoint p : line.getPoints()){
					float yPercent = (p.getY()-minY)/(maxY - minY);
					float xPercent = (p.getX()-minX)/(maxX - minX);
					if (count == 0){
						lastXPixels = sidePadding + (xPercent*usableWidth);
						lastYPixels = getHeight() - bottomPadding - (usableHeight*yPercent);
					} else {
						newXPixels = sidePadding + (xPercent*usableWidth);
						newYPixels = getHeight() - bottomPadding - (usableHeight*yPercent);
						canvas.drawLine(lastXPixels, lastYPixels, newXPixels, newYPixels, paint);
						lastXPixels = newXPixels;
						lastYPixels = newYPixels;
					}
					count++;
				}
			}


			//int pointCount = 0;
			//gera os pontos
			for (Line line : lines){
				int pointCount = 0;
				float maxY = getMaxY();
				float minY = getMinY();
				float maxX = getMaxX();
				float minX = getMinX();

				paint.setColor(line.getColor());
				paint.setStrokeWidth(6);
				paint.setStrokeCap(Paint.Cap.ROUND);

				if (line.isShowingPoints()){
					for (LinePoint p : line.getPoints()){
						float yPercent = (p.getY()-minY)/(maxY - minY);
						float xPercent = (p.getX()-minX)/(maxX - minX);
						float xPixels = sidePadding + (xPercent*usableWidth);
						float yPixels = getHeight() - bottomPadding - (usableHeight*yPercent);
						float yMes=getHeight() - bottomPadding + 40;

						//desenha as bolinhas
						paint.setColor(Color.GRAY);
						canvas.drawCircle(xPixels, yPixels, 10, paint);
						paint.setColor(Color.WHITE);
						canvas.drawCircle(xPixels, yPixels, 5, paint);

						String titulo="";
						float tValor;
						float xMes;
						if(!line.isShowValueUpper()){
							//adiciona o mes
							paint.setColor(Color.GRAY);
							paint.setTextSize(25);

							if(p.getMes()!=null){
						        if(p.getMes().year().get()==(hoje.year().get()))
						        	titulo=p.getMes().toString("MMMM");
						        else
						        	titulo=p.getMes().toString("MMMM/yy");
							}

							tValor=paint.measureText(titulo);
							xMes=xPixels-(tValor/2);
							if(pointCount==0)
								xMes=xPixels;
							else if(pointCount+1==line.getPoints().size())
								xMes=xPixels-tValor;

							canvas.drawText(titulo, xMes, yMes, paint);
						}

						//adiciona o valor
						paint.setColor(Color.GRAY);
						paint.setTextSize(30);
						titulo=NumberFormat.getCurrencyInstance().format(p.getY());
						tValor=paint.measureText(titulo);
						xMes=xPixels-(tValor/2);
						if(pointCount==0)
							xMes=xPixels;
						else if(pointCount+1==line.getPoints().size())
							xMes=xPixels-tValor;

						if(!line.isShowValueUpper())
							canvas.drawText(titulo, xMes, yMes+30, paint);
						else{
							paint.setColor(line.getColor());
							canvas.drawText(titulo, xMes, yPixels-15, paint);
						}

						//seta o scrool para o valor central
						if(p.getMes()!=null)
							if(p.getMes().getMonthOfYear()==hoje.getMonthOfYear() && p.getMes().getYear()==hoje.getYear())
								scroll.scrollTo((int) xMes, 0);

						Path path2 = new Path();
						path2.addCircle(xPixels, yPixels, 30, Direction.CW);
						p.setPath(path2);
						p.setRegion(new Region((int)(xPixels-30), (int)(yPixels-30), (int)(xPixels+30), (int)(yPixels+30)));

						if (indexSelected == pointCount && listener != null){
							paint.setColor(Color.parseColor("#33B5E5"));
							paint.setAlpha(100);
							canvas.drawPath(p.getPath(), paint);
							paint.setAlpha(255);
						}

						pointCount++;
					}
				}
			}


			//gera as medias
			for (Line line : lines){

				float yPercent = (line.getAvarage()-minY)/(maxY - minY);
				float yPixels = getHeight() - bottomPadding - (usableHeight*yPercent);

				paint.setColor(line.getColor());
				paint.setStrokeWidth(3);
				canvas.drawLine(sidePadding,yPixels,usableWidth,yPixels,paint);

				paint.setTextSize(30);

				String titulo=NumberFormat.getCurrencyInstance().format(line.getAvarage());
				float tValor=paint.measureText(titulo);

				float x= getWidth()-sidePadding-tValor;
				if(!line.isShowValueUpper())
					canvas.drawText(titulo, x, yPixels-4, paint);
				else{

					canvas.drawText(titulo, x, yPixels+32, paint);
				}
			}

			shouldUpdate = false;
		}

		ca.drawBitmap(fullImage, 0, 0, null);


	}



	/*@Override
	public boolean onTouchEvent(MotionEvent event) {

	    Point point = new Point();
	    point.x = (int) event.getX();
	    point.y = (int) event.getY();

	    int count = 0;
	    int lineCount = 0;
	    int pointCount = 0;

	    Region r = new Region();
	    for (Line line : lines){
	    	pointCount = 0;
	    	for (LinePoint p : line.getPoints()){

	    		if (p.getPath() != null && p.getRegion() != null){
	    			r.setPath(p.getPath(), p.getRegion());
			    	if (r.contains((int)point.x,(int) point.y) && event.getAction() == MotionEvent.ACTION_DOWN){
			    		indexSelected = count;
			    	} else if (event.getAction() == MotionEvent.ACTION_UP){
			    		if (r.contains((int)point.x,(int) point.y) && listener != null){
			    			listener.onClick(lineCount, pointCount);
			    		}
			    		indexSelected = -1;
			    	}
	    		}

		    	pointCount++;
			    count++;
	    	}
	    	lineCount++;

	    }

	    if (event.getAction() == MotionEvent.ACTION_DOWN || event.getAction() == MotionEvent.ACTION_UP){
	    	shouldUpdate = true;
	    	postInvalidate();
	    }



	    return true;
	}*/


	public void setOnPointClickedListener(OnPointClickedListener listener) {
		this.listener = listener;
	}

	public interface OnPointClickedListener {
		abstract void onClick(int lineIndex, int pointIndex);
	}

	public void setScroll(HorizontalScrollView scroll) {
		this.scroll = scroll;
	}

}
